inherited FRelCCustoPorTipoMovto: TFRelCCustoPorTipoMovto
  Left = 245
  Top = 179
  Width = 861
  Caption = 'ESTOQUE / RELAT'#211'RIOS'
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 16
  inherited Panel1: TPanel
    Width = 853
    object ProgressBar1: TProgressBar
      Left = 640
      Top = 8
      Width = 209
      Height = 17
      Min = 0
      Max = 100
      TabOrder = 2
    end
  end
  inherited Panel2: TPanel
    Width = 853
    Caption = 'CONSUMO POR C.CUSTO X CLASSIF. PRODUTO'
  end
  inherited GroupBox1: TGroupBox
    object Label3: TLabel
      Left = 14
      Top = 22
      Width = 91
      Height = 16
      Caption = 'Estoque / Local'
    end
    object Label53: TLabel
      Left = 14
      Top = 147
      Width = 171
      Height = 16
      Caption = 'Classifica'#231#227'o do Produto (F8)'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
    end
    object Label5: TLabel
      Left = 366
      Top = 148
      Width = 125
      Height = 16
      Caption = 'Grupo Class. Produto'
    end
    object Label7: TLabel
      Left = 13
      Top = 272
      Width = 94
      Height = 16
      Caption = 'Grupo Consumo'
    end
    object DBLCBLocal: TDBLookupComboBox
      Left = 14
      Top = 38
      Width = 197
      Height = 22
      Ctl3D = False
      KeyField = 'LOC_CODIGO'
      ListField = 'LOC_DESCRICAO'
      ListSource = DSLocal
      ParentCtl3D = False
      TabOrder = 0
      OnKeyDown = DBLCBLocalKeyDown
    end
    object GroupBox3: TGroupBox
      Left = 14
      Top = 68
      Width = 483
      Height = 68
      Caption = '  Centro de Custo  '
      TabOrder = 1
      object Label4: TLabel
        Left = 10
        Top = 18
        Width = 40
        Height = 16
        Caption = 'C'#243'digo'
      end
      object Label16: TLabel
        Left = 85
        Top = 20
        Width = 85
        Height = 16
        Caption = 'Descri'#231#227'o (F8)'
      end
      object edCodCentroCusto: TEdit
        Left = 10
        Top = 37
        Width = 67
        Height = 22
        TabOrder = 0
        OnExit = edCodCentroCustoExit
        OnKeyDown = edCodCentroCustoKeyDown
      end
      object DBLCBCentroCusto: TDBLookupComboBox
        Left = 85
        Top = 38
        Width = 387
        Height = 22
        Ctl3D = False
        KeyField = 'ESTRUTURA'
        ListField = 'DESCRICAO'
        ListSource = dsCentroCusto
        ParentCtl3D = False
        TabOrder = 1
        OnExit = DBLCBCentroCustoExit
        OnKeyDown = DBLCBCentroCustoKeyDown
      end
    end
    object dblcbClassProduto: TDBLookupComboBox
      Left = 14
      Top = 166
      Width = 347
      Height = 22
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = []
      KeyField = 'ESTRUTURA'
      ListField = 'CLASS_PROD_DESCRICAO'
      ListSource = dsClassProduto
      ParentFont = False
      TabOrder = 2
      OnKeyDown = dblcbClassProdutoKeyDown
    end
    object edGrupo: TEdit
      Left = 366
      Top = 166
      Width = 121
      Height = 22
      TabOrder = 3
    end
    object gbDataCadastro: TGroupBox
      Left = 14
      Top = 203
      Width = 331
      Height = 54
      Caption = ' Per'#237'odo '
      TabOrder = 4
      object Label6: TLabel
        Left = 161
        Top = 22
        Width = 7
        Height = 16
        Caption = 'a'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
      end
      object edDataIni: TDateEdit
        Left = 8
        Top = 21
        Width = 90
        Height = 21
        NumGlyphs = 2
        TabOrder = 0
      end
      object edDataFim: TDateEdit
        Left = 174
        Top = 21
        Width = 90
        Height = 21
        NumGlyphs = 2
        TabOrder = 2
      end
      object dtpHora1: TDateTimePicker
        Left = 100
        Top = 20
        Width = 57
        Height = 24
        CalAlignment = dtaLeft
        Date = 39690
        Time = 39690
        DateFormat = dfShort
        DateMode = dmComboBox
        Kind = dtkTime
        ParseInput = False
        TabOrder = 1
      end
      object dtpHora2: TDateTimePicker
        Left = 266
        Top = 20
        Width = 57
        Height = 24
        CalAlignment = dtaLeft
        Date = 39690.9999884259
        Time = 39690.9999884259
        DateFormat = dfShort
        DateMode = dmComboBox
        Kind = dtkTime
        ParseInput = False
        TabOrder = 3
      end
    end
    object edGrupoConsumo: TEdit
      Left = 109
      Top = 266
      Width = 30
      Height = 22
      MaxLength = 1
      TabOrder = 5
    end
  end
  inherited GroupBox2: TGroupBox
    object TipoRelt: TRadioGroup
      Left = 8
      Top = 64
      Width = 255
      Height = 57
      Caption = '  Apresenta'#231#227'o do Centro de custo  '
      Columns = 3
      ItemIndex = 0
      Items.Strings = (
        'Sintetico'
        'Analitico'
        'Detalhado')
      TabOrder = 5
    end
    object RadioGroup1: TRadioGroup
      Left = 8
      Top = 128
      Width = 255
      Height = 57
      Caption = '  Apresenta'#231#227'o da Class. Produto   '
      Columns = 2
      ItemIndex = 0
      Items.Strings = (
        'Sintetico'
        'Detalhado')
      TabOrder = 6
    end
    object rbTxt: TRadioButton
      Left = 16
      Top = 328
      Width = 113
      Height = 17
      Caption = 'Arquivo TXT'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 7
    end
  end
  inherited RLReport: TRLReport
    Left = 40
    Top = 485
    DataSource = DSPesquisa
    ExpressionParser = RLExpressionParser1
    inherited RLBand1: TRLBand
      Borders.DrawBottom = False
      inherited rlEmpresa: TRLLabel
        Left = 3
        Width = 250
        AutoSize = False
      end
      inherited rlSisLocal: TRLLabel
        Left = 3
        Width = 250
        AutoSize = False
      end
      inherited rlname: TRLLabel
        Left = 3
        Width = 250
        AutoSize = False
      end
      inherited rlSubTitulo: TRLLabel
        Left = 3
        Width = 250
        AutoSize = False
      end
      inherited RLMemo: TRLMemo
        Left = 339
        Width = 369
        Height = 14
      end
      inherited rlInfo: TRLSystemInfo
        Left = 584
      end
      inherited rlInfo1: TRLLabel
        Left = 339
      end
    end
    object RLBand9: TRLBand
      Left = 38
      Top = 136
      Width = 718
      Height = 17
      BandType = btSummary
      Borders.Sides = sdCustom
      Borders.DrawLeft = False
      Borders.DrawTop = False
      Borders.DrawRight = False
      Borders.DrawBottom = True
    end
    object RLBand2: TRLBand
      Left = 38
      Top = 120
      Width = 718
      Height = 16
      object RLDBText2: TRLDBText
        Left = 3
        Top = 0
        Width = 229
        Height = 16
        AutoSize = False
        DataField = 'CC_ESTRUTURA'
        DataSource = DSPesquisa
        BeforePrint = RLDBText2BeforePrint
      end
      object RLDBText3: TRLDBText
        Left = 323
        Top = 0
        Width = 78
        Height = 16
        AutoSize = False
        DataField = 'CL_ESTRUTURA'
        DataSource = DSPesquisa
        BeforePrint = RLDBText3BeforePrint
      end
      object RLDBText4: TRLDBText
        Left = 584
        Top = 0
        Width = 132
        Height = 16
        Alignment = taRightJustify
        AutoSize = False
        DataField = 'VALOR'
        DataSource = DSPesquisa
      end
      object RLDBText5: TRLDBText
        Left = 243
        Top = 0
        Width = 73
        Height = 16
        AutoSize = False
        DataField = 'CC_CCODIGO'
        DataSource = DSPesquisa
      end
      object RLDBText6: TRLDBText
        Left = 403
        Top = 0
        Width = 177
        Height = 16
        AutoSize = False
        DataField = 'CL_DESCRI'
        DataSource = DSPesquisa
        BeforePrint = RLDBText3BeforePrint
      end
    end
  end
  inherited QPesquisa: TQuery
    Active = True
    AfterOpen = QPesquisaAfterOpen
    Filtered = True
    SQL.Strings = (
      'SELECT'
      '  MOVIMENTOESTOQUE.MOVEST_CODIGO,'
      '  CC.CODIGO,'
      '  CC.DESCRICAO,'
      '  CC.ESTRUTURA AS CC_ESTRUTURA,'
      '  CC.NIVEL,'
      '  CLASS.ESTRUTURA AS CL_ESTRUTURA,'
      '  CC.CODIGOCENTROCUSTO,'
      '  CLASS.CLASS_PROD_DESCRICAO,'
      '  CLASS.CLASS_PROD_CODIGO,'
      '  CLASS.TIPO,'
      '  CLASS.CLASS_PROD_NIVEL,'
      '  TIPOMOVIMENTOESTOQUE.TIPMOVEST_DESCRICAO,'
      '  TIPOMOVIMENTOESTOQUE.TIPMOVEST_ENTRADASAIDA,'
      
        '  ITENSMOVIMENTOESTOQUE.ITENSMOVEST_QUANTIDADE * ITENSMOVIMENTOE' +
        'STOQUE.ITENSMOVEST_VALORC AS VALOR'
      'FROM'
      '  MOVIMENTOESTOQUE'
      
        '  INNER JOIN ITENSMOVIMENTOESTOQUE  ON (MOVIMENTOESTOQUE.MOVEST_' +
        'CODIGO = ITENSMOVIMENTOESTOQUE.ITENSMOVEST_MOVIMENTOESTOQUE)'
      
        '  INNER JOIN PRODUTO                ON (ITENSMOVIMENTOESTOQUE.IT' +
        'ENSMOVEST_PRODUTO = PRODUTO.PROD_CODIGO)'
      
        '  INNER JOIN CENTROCUSTO_NIVEL CC   ON (MOVIMENTOESTOQUE.MOVEST_' +
        'CENTROCUSTO = CC.CODIGO)'
      
        '  INNER JOIN TIPOMOVIMENTOESTOQUE   ON (MOVIMENTOESTOQUE.MOVEST_' +
        'TIPOMOVIMENTO = TIPOMOVIMENTOESTOQUE.TIPMOVEST_CODIGO)'
      
        '  INNER JOIN CLASS_PROD_NIVEL CLASS ON (PRODUTO.PROD_CLASSIFPROD' +
        '1 = CLASS.CLASS_PROD_CODIGO)'
      'ORDER BY'
      '  CC.ESTRUTURA,'
      '  CLASS.ESTRUTURA,'
      '  TIPOMOVIMENTOESTOQUE.TIPMOVEST_DESCRICAO')
  end
  object ClientDataSet1: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 248
    Top = 24
  end
  object RLExpressionParser1: TRLExpressionParser
    Left = 600
    Top = 16
  end
  object DSLocal: TDataSource
    DataSet = DMGestao.QLocal
    Left = 224
    Top = 80
  end
  object dsCentroCusto: TDataSource
    DataSet = QCCusto
    Left = 488
    Top = 136
  end
  object dsClassProduto: TDataSource
    DataSet = DMGestao.QClassProduto
    Left = 400
    Top = 216
  end
  object QCCusto: TQuery
    Active = True
    AfterOpen = QPesquisaAfterOpen
    DatabaseName = 'base'
    SQL.Strings = (
      'SELECT * FROM CENTROCUSTO ORDER BY ESTRUTURA')
    Left = 504
    Top = 177
  end
  object ClientDataSet2: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 384
    Top = 136
  end
end
